beginobjectscript; // talking object

variables;

body;

beginstate INIT_STATE;
	break;

beginstate DEAD_STATE;
	break;

beginstate START_STATE; 
	break;

beginstate USE_STATE;
	if (gf(100,21) > 0)
		begin_talk_mode(48);
	if ((char_ok(9)) && (dist_to_char(9) <= 7))
		begin_talk_mode(47);
	if (gf(100,17) > 0)
		begin_talk_mode(49);
	begin_talk_mode(40);
break;
